Chip 2000 October/CHIP Turkiye Ekim 2000.iso/prog/demo/MATH/_SETUP.1/Abt_math.exe/0/RCDATA/TMAILFORM/TMAILFORM.txt

Text File | 2000-07-28 | 11.7 KB | 403 lines

object mailform: Tmailform
  Left = 292
  Top = 185
  BorderStyle = bsDialog
  Caption = 'ABT Mail '
  ClientHeight = 453
  ClientWidth = 538
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 538
    Height = 434
    ActivePage = TabSheet1
    Align = alClient
    TabOrder = 0
    OnChange = PageControl1Change
    object TabSheet1: TTabSheet
      Caption = 'Ba�lant�/kullan�c� bilgileri'
      object Label1: TLabel
        Left = 30
        Top = 24
        Width = 88
        Height = 13
        Caption = 'Server ad�  (POP3)'
      end
      object Label2: TLabel
        Left = 99
        Top = 48
        Width = 19
        Height = 13
        Caption = 'Port'
      end
      object Label3: TLabel
        Left = 22
        Top = 72
        Width = 96
        Height = 13
        Caption = 'Kullan�c� (Username)'
      end
      object Label4: TLabel
        Left = 45
        Top = 96
        Width = 73
        Height = 13
        Caption = '�ifre(Password)'
      end
      object SpeedButton1: TSpeedButton
        Left = 39
        Top = 152
        Width = 150
        Height = 49
        Caption = 'Ba�lan'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00550B30555000
          0000557F57F557777777550B305508888880557F57F575555557550B30508888
          8805557F57F7FFFFFF75550B300000000055557F5777777777F5550300000000
          0055557F777F555F77F555007800000070555F77557F5F7757F5007888000077
          70557755557F775557F508888800777770557F555577555557F5088808077777
          70557FF5757F555557F5098988077777705577F7557F555557F5999888077777
          705577755575F55557550988888077770555775555575FFF7555088888888000
          55557F55555577775555088888880755555575F5555F77555555508888075555
          5555575FFF775555555555000755555555555577775555555555}
        NumGlyphs = 2
        OnClick = SpeedButton1Click
      end
      object SpeedButton2: TSpeedButton
        Left = 231
        Top = 152
        Width = 150
        Height = 49
        Caption = 'Ba�lant�y� kes'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00550B30555000
          0000557F57F557777777550B305508888880557F57F575555557550B30508888
          8805557F57F7FFFFFF75550B300000000055557F5777777777F5550300000000
          0055557F7777777777F55500780F0F0F70555F777577F7F7F7F50078880F0F0F
          705577755577F7F7F7F50888880F0F0F70557F555F77F7F7F7F50888080F0F0F
          70557F557F77F7F7F7F50888980F0F0F70557F557F77F7F7F7F5088898007070
          70557F557F77F757575508889880077705557F5F7F5775FF7555089998888000
          55557F777F555777555508999888075555557577755F77555555508888075555
          5555575FFF775555555555000755555555555577775555555555}
        NumGlyphs = 2
        OnClick = SpeedButton2Click
      end
      object Edit1: TEdit
        Left = 123
        Top = 17
        Width = 121
        Height = 21
        TabOrder = 0
      end
      object Edit2: TEdit
        Left = 123
        Top = 41
        Width = 36
        Height = 21
        TabOrder = 1
        Text = '110'
      end
      object Edit3: TEdit
        Left = 123
        Top = 65
        Width = 121
        Height = 21
        TabOrder = 2
      end
      object Edit4: TEdit
        Left = 123
        Top = 89
        Width = 121
        Height = 21
        PasswordChar = '*'
        TabOrder = 3
      end
    end
    object TabSheet3: TTabSheet
      Caption = 'Gelen posta listesi'
      object Label11: TLabel
        Left = 1
        Top = 89
        Width = 114
        Height = 13
        Caption = 'Message Number / Size'
      end
      object SpeedButton3: TSpeedButton
        Left = 9
        Top = 17
        Width = 137
        Height = 34
        Caption = 'Masajlar� listele'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333333333333333FFFFFFFFFFFFFFF000000000000
          0000777777777777777707FFFFFFFFFFFF70773FF33333333F770F77FFFFFFFF
          77F07F773FF3333F77370FFF77FFFF77FFF07F33773FFF7733370FFFFF0000FF
          FFF07F333F77773FF3370FFF70EEEE07FFF07F3F773333773FF70F707FFFFFF7
          07F07F77333333337737007EEEEEEEEEE70077FFFFFFFFFFFF77077777777777
          77707777777777777777307EEEEEEEEEE7033773FF333333F77333707FFFFFF7
          0733333773FF33F773333333707EE707333333333773F7733333333333700733
          3333333333377333333333333333333333333333333333333333}
        NumGlyphs = 2
        OnClick = SpeedButton3Click
      end
      object SpeedButton4: TSpeedButton
        Left = 153
        Top = 17
        Width = 137
        Height = 34
        Caption = 'Mesaj sil'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
          555557777F777555F55500000000555055557777777755F75555005500055055
          555577F5777F57555555005550055555555577FF577F5FF55555500550050055
          5555577FF77577FF555555005050110555555577F757777FF555555505099910
          555555FF75777777FF555005550999910555577F5F77777775F5500505509990
          3055577F75F77777575F55005055090B030555775755777575755555555550B0
          B03055555F555757575755550555550B0B335555755555757555555555555550
          BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
          50BB555555555555575F555555555555550B5555555555555575}
        NumGlyphs = 2
        OnClick = SpeedButton4Click
      end
      object ListBox1: TListBox
        Left = 0
        Top = 114
        Width = 530
        Height = 292
        Align = alBottom
        ItemHeight = 13
        TabOrder = 0
        OnDblClick = ListBox1DblClick
      end
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 434
    Width = 538
    Height = 19
    Panels = <>
    SimplePanel = True
  end
  object Panel2: TPanel
    Left = 328
    Top = 40
    Width = 525
    Height = 402
    TabOrder = 2
    Visible = False
    object Label6: TLabel
      Left = 1
      Top = 224
      Width = 523
      Height = 13
      Align = alTop
      Alignment = taCenter
      Caption = 'Mesaj i�eri�i'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label7: TLabel
      Left = 1
      Top = 102
      Width = 523
      Height = 13
      Align = alTop
      Alignment = taCenter
      Caption = 'Mesaj Ba�l���'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object SpeedButton5: TSpeedButton
      Left = 184
      Top = 377
      Width = 145
      Height = 22
      Caption = 'Tamam'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        555555555555555555555555555555555555555555FF55555555555559055555
        55555555577FF5555555555599905555555555557777F5555555555599905555
        555555557777FF5555555559999905555555555777777F555555559999990555
        5555557777777FF5555557990599905555555777757777F55555790555599055
        55557775555777FF5555555555599905555555555557777F5555555555559905
        555555555555777FF5555555555559905555555555555777FF55555555555579
        05555555555555777FF5555555555557905555555555555777FF555555555555
        5990555555555555577755555555555555555555555555555555}
      NumGlyphs = 2
      OnClick = SpeedButton5Click
    end
    object Panel1: TPanel
      Left = 1
      Top = 1
      Width = 523
      Height = 101
      Align = alTop
      TabOrder = 0
      object Label10: TLabel
        Left = 9
        Top = 140
        Width = 38
        Height = 13
        Caption = 'Label10'
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Label8: TLabel
        Left = 39
        Top = 17
        Width = 41
        Height = 13
        Caption = 'Kimden :'
      end
      object Label9: TLabel
        Left = 16
        Top = 44
        Width = 64
        Height = 13
        Caption = 'Konu Ba�l��� :'
      end
      object Label12: TLabel
        Left = 12
        Top = 73
        Width = 68
        Height = 13
        Caption = 'Boyut( Bytes): '
        OnClick = Label12Click
      end
      object Label13: TLabel
        Left = 183
        Top = 73
        Width = 48
        Height = 13
        Caption = 'Mesaj ID: '
      end
      object Edit6: TEdit
        Left = 97
        Top = 14
        Width = 224
        Height = 21
        Color = cl3DLight
        ReadOnly = True
        TabOrder = 0
        Text = 'Edit6'
      end
      object Edit7: TEdit
        Left = 97
        Top = 40
        Width = 384
        Height = 21
        Color = cl3DLight
        ReadOnly = True
        TabOrder = 1
        Text = 'Edit7'
      end
      object Edit8: TEdit
        Left = 97
        Top = 69
        Width = 33
        Height = 21
        Color = cl3DLight
        ReadOnly = True
        TabOrder = 2
        Text = 'Edit8'
      end
      object Edit9: TEdit
        Left = 248
        Top = 69
        Width = 217
        Height = 21
        Color = cl3DLight
        ReadOnly = True
        TabOrder = 3
        Text = 'Edit9'
      end
    end
    object Memo2: TMemo
      Left = 1
      Top = 115
      Width = 523
      Height = 109
      Align = alTop
      Lines.Strings = (
        'Memo2')
      TabOrder = 1
    end
    object Memo1: TMemo
      Left = 1
      Top = 237
      Width = 523
      Height = 138
      Align = alTop
      Lines.Strings = (
        'Memo1')
      TabOrder = 2
    end
  end
  object NMPOP31: TNMPOP3
    Host = 'mail.bnet.net.tr'
    Port = 110
    ReportLevel = 0
    OnDisconnect = NMPOP31Disconnect
    OnConnect = NMPOP31Connect
    OnInvalidHost = NMPOP31InvalidHost
    OnHostResolved = NMPOP31HostResolved
    OnStatus = NMPOP31Status
    OnConnectionFailed = NMPOP31ConnectionFailed
    OnConnectionRequired = NMPOP31ConnectionRequired
    OnPacketRecvd = NMPOP31PacketRecvd
    UserID = 'bersin'
    Password = '2635878'
    DeleteOnRead = False
    OnReset = NMPOP31Reset
    OnList = NMPOP31List
    OnRetrieveStart = NMPOP31RetrieveStart
    OnRetrieveEnd = NMPOP31RetrieveEnd
    OnSuccess = NMPOP31Success
    OnFailure = NMPOP31Failure
    Left = 92
    Top = 160
  end
end